library(dplyr, warn.conflicts = FALSE)
library(ggplot2)
library(ggiraph)
library(purrr)
data_identifier = "CAT-3B"
text_as_fun <- function(function_string){
eval(parse(text = function_string))
}
file_names <- list.files("../data/simulation_exports/", pattern = data_identifier)
file_paths <- list.files("../data/simulation_exports/", pattern = data_identifier, full.names = TRUE)
sim_list <- purrr::map(
.x = file_paths,
.f = readRDS
)Simulation data processing (CAT-3B)
Setup
Packages and functions
Pre-processing
- Define variables for identifying unique cells
- Remove all intercepts (not of interest)
- Remove “gb1b” term - not manipulated on heteroscedasticity
- Merge into a df